home *** CD-ROM | disk | FTP | other *** search
/ Red Eye Press Kit / Red Eye Press Kit.iso / pc / start.dxr / 00002_startUp.ls < prev    next >
Encoding:
Text File  |  2005-03-04  |  499 b   |  27 lines
  1. on exitFrame
  2.   if tryToSetColorDepth(16) = 0 then
  3.     go("changeColorDepth")
  4.   else
  5.     if QuickTimeVersion() < 6.0 then
  6.       go("QTInstall")
  7.     else
  8.       go(1, "Main")
  9.     end if
  10.   end if
  11. end
  12.  
  13. on tryToSetColorDepth desiredDepth
  14.   if the colorDepth >= desiredDepth then
  15.     return 1
  16.   end if
  17.   if (the environment).platform contains "Windows,32" then
  18.     return 0
  19.   end if
  20.   set the colorDepth to desiredDepth
  21.   if the colorDepth = desiredDepth then
  22.     return 1
  23.   else
  24.     return 0
  25.   end if
  26. end
  27.